class APP
feature
    INIT
    local 
        a:INTEGER
    do
        a.test:=2
    end
end